home *** CD-ROM | disk | FTP | other *** search
/ The Trig Explorer / The Trig Explorer.iso / mac / Explorer / plot.dxr / 00168.ls < prev    next >
Encoding:
Text File  |  2000-08-01  |  391 b   |  15 lines
  1. on mouseUp
  2.   puppetSound("click")
  3.   if the hilite of cast "Degrees" then
  4.     put PI / 180.0 * field "theta" into field "theta"
  5.   end if
  6.   set the hilite of cast "Degrees" to 0
  7.   set the hilite of cast "Radians" to 1
  8.   if the hilite of cast "Degrees" then
  9.     set the castNum of sprite 16 to cast "Degs"
  10.   else
  11.     set the castNum of sprite 16 to cast "Rads"
  12.   end if
  13.   go(the frame - 1)
  14. end
  15.